2 PRINT"[193][211][195][201][201] [195]ONVERSION64 V1.0   BY [194]OB [203]OBER"
3 OPEN15,8,15
4 INPUT"[201]NPUT FILENAME";FI$
5 OPEN1,8,2,FI$:GOSUB14 :IFETHENCLOSE1:GOTO4 
6 INPUT"[207]UTPUT FILENAME";FO$
7 PRINT"[195]ONVERT TO ([208])ET, OR ([212])RUE [193][211][195][201][201]?";
8 GETC$:ON-(C$=""OR(C$<>"P"ANDC$<>"T"))GOTO8 :PRINT" "C$:C=1:IFC$="P"THENC=0
9 POKE2480,C
10 OPEN2,8,1,FO$+",S":GOSUB14 :IFETHENCLOSE2:GOTO6 
11 SYS2481:CLOSE15
12 PRINT:PRINT"[195]ONVERT ANOTHER? ([217]/[206])"
13 POKE198,0:WAIT198,1:GETC$:POKE198,0:ON-(C$="Y")GOTO2 :END
14 INPUT#15,E,ER$:IFETHENPRINT"[207][207][208][211]!"ER$
15 RETURN